Shareware Super Platinum 8

home *** CD-ROM | disk | FTP | other *** search

/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / SAC271.ZIP;1 / FOXPRO.ZIP / SACPR1.FXP (.txt) < prev next >

Wrap

MS Visual FoxPro App | 1993-08-27 | 17.1 KB | 371 lines

[\<1] - 80 Column Deep Sky Report [\<2] - 132 Column Deep Sky Report [\<3] - Word for Windows (Deep Sky Data File) [\<4] - 80 Column Deep Sky Log Report [\<Q] - Quit to report menu DEACTIVATE POPUP SACPR1 : : Print cPRNf WINDOW NFORM_SCR U2000 TIRION DDATE DDATE_1 DDATE_2 CTIME CNOTES NINDEX NORDER NPR_SS YESNO CPR_GIF CPR_PRN OPTION CFILE CPR_WFW PRINT : : 99:99:99 Ascending Descending8 SET ORDER TO nINDEX &cORDER INDEX ON UPPER(CLUBS)+UPPER(OBJECT) FOR CLUBS <> SPACE(10) .AND. mOBJECT$UPPER(OBJECT) .AND. mOTHER$UPPER(OTHER) .AND. mTYPE=TYPE .AND. mCONST=CONST .AND. RA-nFAC<=mRA.AND.mRA<=RA+nFAC .AND. DEC-nFAC<=mDEC.AND.mDEC<=DEC+nFAC .AND. MAG-nFAC<=mMAG.AND.mMAG<=MAG+nFAC .AND. BRSTR-nFAC<=mBRSTR.AND.mBRSTR<=BRSTR+nFAC .AND. mDESC$UPPER(DESC) .AND. mSIZE$UPPER(SIZE) .AND. mCLASS$UPPER(CLASS) .AND. mSOURCE$UPPER(SOURCE) .AND. NSTS-nFAC<=mNSTS.AND.mNSTS<=NSTS+nFAC .AND. mCLUBS$UPPER(CLUBS) .AND. mNOTES$UPPER(NOTES) SET FILTER TO &cD .AND. dDATE_1<=LOG_DATE .AND. LOG_DATE<=dDATE_2 SET FILTER TO &cD Press [ESC] to return to main menu... cSAC_INDEXf CTIME DDATE M_SCR CORDER NORDER CSAC_INDEXNINDEX FNFILE DEXPLSWAIT FNTALK _INDEXOBJECT MOBJECT OTHER MOTHER MTYPE CONST MCONST BRSTR MBRSTR MDESC MSIZE CLASS MCLASS SOURCE MSOURCE MNSTS MU2000 U2000 MTIRION TIRION CLUBS MCLUBS CNOTES MNOTES SACLOG DDATE_1 DDATE_2 PRINT1 PRINT2 PRINT3 PRINT4 CDATAPATH NFORM_NDX ?? &cPR_DEF bESC =.T. ?? &cPR_DEF ?? &cPR_BON Page F 80 Column SAC Deep Sky Report Date is Deep Sky Filter is ?? &cPR_BOFF Object: Other Names: Type of Object: M->TYPE Constellation : M->CONST L.S.T.: Right Ascension : F 99.9999c Azimuth (DDD.MMSS):F 999.9999c Date: Declination :F 999.9999c Altitude (DDD.MMSS):F 999.9999c Time: Magnitude : F Magnitude of Brightest Star: Description: Size : Class: Source : # of Stars : F U 2000 : Clubs: Tirion 2000: Notes: cPRNf * * * Report Interrupted by User * * * ?? &cPR_DEF Number of Printed Records = F CFILE NCOUNT NPAGE NPR_MAX NRPT_ROW NRPT_MAX INDEXDDATE DEXLST CTIME INDEXDMS AL_AZ U2000 FNU2000 TIRION FNTIRION MU2000 MTIRION CSAC_NAME OBJECT OTHER FLD_DES CONST BRSTR CLASS SOURCE CLUBS T_ROW NOTES CGIFPATH CPR_GIF PRINT_GIF THERM ?? &cPR_CON bESC =.T. ?? &cPR_BON Page F 132 Column SAC Deep Sky Report Date is Deep Sky Filter is RA Tirion Size # Stars Source Object Other Type Const Dec. Mag. U2000 Class Magnitude Clubs ----------------- ----------------- ----- --- ------- ---- ---------------- ----------- ----- ---------- ?? &cPR_BOFF F Description: F Notes: * * * Report Interrupted by User * * * ?? &cPR_DEF Number of Printed Records = F CFILE NCOUNT NPAGE NPR_MAX NRPT_ROW NRPT_MAX INDEXDDATE DEXLST CTIME INDEXDMS AL_AZ U2000 FNU2000 TIRION FNTIRION MU2000 MTIRION CSAC_NAME OBJECT OTHER CONST SOURCE CLASS BRSTR CLUBS T_ROW NOTES THERM OBJECT OTHER CONST U2000 TIRION CLASS BRSTR NOTES SOURCE CLUBS bESC =.T. Number of Printed Records = F CFILE NCOUNT DDATE CTIME NDEXCLST DEXNRA INDEXNAZ AL_AZ U2000 FNU2000 TIRION FNTIRION MU2000 MTIRION OBJECT OTHER CONST _NAME CLASS BRSTR NOTES NNOTES SOURCE CLUBS THERM ?? &cPR_DEF bESC =.T. ?? &cPR_DEF ?? &cPR_BON Page F 80 Column SAC Deep Sky Log Date is Deep Sky Filter is ?? &cPR_BOFF Object: Other Names: Type of Object: M->TYPE Constellation : M->CONST L.S.T.: Right Ascension : F 99.9999c Azimuth (DDD.MMSS):F 999.9999c Date: Declination :F 999.9999c Altitude (DDD.MMSS):F 999.9999c Time: Magnitude : F Magnitude of Brightest Star: Description: Size : Class: Source : # of Stars : F U 2000 : Clubs: Tirion 2000: Log Date: F Log Time: Log Date: F Log Time: Notes: cPRNf * * * Report Interrupted by User * * * ?? &cPR_DEF Number of Printed Records = F CFILE NCOUNT NPAGE NPR_MAX NRPT_ROW NRPT_MAX NDEXDDATE DEXLST CTIME INDEXDMS COBJECT OBJECT COTHER OTHER AL_AZ U2000 FNU2000 TIRION FNTIRION MU2000 MTIRION SACLOG CSAC_NAME FLD_DES CONST BRSTR CLASS SOURCE CLUBS LOG_DATE LOG_TIME T_ROW NOTES CGIFPATH CPR_GIF PRINT_GIF THERM PRINT PRINT1 PRINT2 PRINT3 PRINT4 D:\SKY\SAC\ SACPR1.FXP D:\SKY\SAC\SACPR1.PRG